www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\Label\custom_Label\图片视频音乐系统标签库\nd_view_picsp.asp
<%'$start_ext_newDsoft 以下系统生成,勿删!
'$newDsoft_label_type$:dyn_content_label$end_newDsoft_label_type$
'$newDsoft_label_name$:nd_view_picsp$end_newDsoft_label_name$
'$newDsoft_label_sql$:select [ND_pic_or_sp].id,[ND_pic_or_sp].sys_content_type,[ND_pic_or_sp].title,[ND_pic_or_sp].classid,[ND_pic_or_sp].SpecialID,[ND_pic_or_sp].titleColor,[ND_pic_or_sp].titleFont,[ND_pic_or_sp].index_page_pic,[ND_pic_or_sp].content,[ND_pic_or_sp].is_outlink,[ND_pic_or_sp].outlink,[ND_pic_or_sp].Author_nick,[ND_pic_or_sp].is_new,[ND_pic_or_sp].is_tuijian,[ND_pic_or_sp].isTop,[ND_pic_or_sp].Hits,[ND_pic_or_sp].DayHits,[ND_pic_or_sp].MonthHits,[ND_pic_or_sp].HitsTime,[ND_pic_or_sp].WriteTime,[ND_pic_or_sp].username,[ND_pic_or_sp].UploadImage_list,[ND_pic_or_sp].Uploadfile_list,[ND_pic_or_sp].is_shenhe,[ND_pic_or_sp].is_can_pinlun,[ND_pic_or_sp].comefrom,[ND_pic_or_sp].liulang_dengji_group_id,[ND_pic_or_sp].dianshuo_to_look,[ND_pic_or_sp].xingji,[ND_pic_or_sp].DownAddress,[ND_pic_or_sp].is_show_down,[ND_pic_or_sp].showmode,[ND_pic_or_sp].showurl from [ND_pic_or_sp] where [ND_pic_or_sp].id=$xxvar$id$end_newDsoft_label_sql$
'$newDsoft_label_params$:id,图片或音视频 id,2|durl,点 图片或音视频 地址时转向的 图片或音视频 链接提取页面,2|width,显示时的宽度,3$end_newDsoft_label_params$
'$newDsoft_label_fenye_num$: $end_newDsoft_label_fenye_num$
'$newDsoft_label_beizhu$:显示 图片或音视频 详细内容$end_newDsoft_label_beizhu$
'$newDsoft_is_sys_label$:0$end_newDsoft_is_sys_label$
'$newDsoft_other_params$:rsname:rs_x|htmledxa:1|htmledxb:<!--picc_counter-1-->$123$121$accndcpu232$321$<!--picc_counter-2-->$end_newDsoft_other_params$
'$end_ext_newDsoft%>
<div><style type="text/css">
#eeep{width:$xxvar$width px}
.picsize {width:$xxvar$width px}
.picsize img {max-height:510px; max-width:510px; width:expression(this.width > 510 && this.height < this.width ? 510: true); height:expression(this.height > 510 ? 510: true);}
.a11pd {
border: 1px solid #A4D8EF;
}</style>{$$include_replace_cont}{$$include_pagination} <%
dianss=rs_x("dianshuo_to_look")
grid=rs_x("liulang_dengji_group_id")
%>{$$chk_user_grade($xx_var_asp$grid,$xx_var_asp$dianss)}</div>
<div class="picsize">
<table id="eeep" style="word-break: break-all" cellspacing="0" cellpadding="0" align="center" border="0">
<tbody>
<tr>
<td width="100%">
<table class="a11pd" cellspacing="0" cellpadding="0" width="98%" align="center">
<tbody>
<tr>
<td>
<table cellspacing="0" cellpadding="0" width="100%" align="center" border="0">
<tbody>
<tr>
<td align="center" bgcolor="#efefef" colspan="2" height="23">{$$include_picsp_count($xxvar$id)}<strong><font color="#0033ff">{$fmt([ND_pic_or_sp].title,Text,0,2,0)}</font></strong></td>
</tr>
<tr>
<td width="14%"><strong>整理时间：</strong></td>
<td width="86%" height="23">{$fmt([ND_pic_or_sp].WriteTime,Time,0,{year}-{month}-{day})}</td>
</tr>
<tr>
<td><strong>原 作 者：</strong></td>
<td height="23">{$fmt([ND_pic_or_sp].Author_nick,Text,0,0,0)}</td>
</tr>
<tr>
<td><strong>作品来源：</strong></td>
<td height="23">{$fmt([ND_pic_or_sp].comefrom,Text,0,0,0)}</td>
</tr>
<tr>
<td><strong>推荐星级：</strong></td>
<td height="23"><%
'on error resume next
for ipir=1 to cint(rs_x("xingji"))
%>★ <%next%></td>
</tr>
<tr>
<td><strong>浏览统计：</strong></td>
<td height="23"><!--picc_counter-1--><%=stop_count_aastr%>[本日 :{$fmt([ND_pic_or_sp].DayHits,Num,0,0)}  本月 :{$fmt([ND_pic_or_sp].MonthHits,Num,0,0)}  总 :{$fmt([ND_pic_or_sp].Hits,Num,0,0)}] <!--picc_counter-2--></td>
</tr>
<tr>
<td valign="middle" align="center" colspan="2" height="204"><%
url=rs_x("showurl")
widtha=400
heighta=300
Select Case CInt(rs_x("showmode"))
Case 1
Response.Write "<object codebase=""http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=4,0,0,0"" height="""& heighta &""" width="""& widtha &""" classid=""clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"">"& vbCrLf
Response.Write " <param name=""movie"" value=""" & url & """>"& vbCrLf
Response.Write " <param name=""quality"" value=""high"">"& vbCrLf
Response.Write " <param name=""SCALE"" value=""exactfit"">"& vbCrLf
Response.Write " <embed src=""" & url & """ quality=""high"" pluginspage=""http://www.macromedia.com/shockwave/download/index.cgi?P1_Prod_Version=ShockwaveFlash"" type=""application/x-shockwave-flash"" height="""& heighta &""" width="""& widtha &""" >"& vbCrLf
Response.Write " </embed>"& vbCrLf
Response.Write "</object>"& vbCrLf
Case 2
Response.Write "<a href="""&rs_x("showurl")&""" target=""_blank""><img src=""" & url & """ border=""0""></a>"
Case 3
Response.Write "<object classid=""CLSID:22D6F312-B0F6-11D0-94AB-0080C74C7E95"" class=""OBJECT"" id=""MediaPlayer"" height="""& heighta &""" width="""& widtha &""" >"& vbCrLf
Response.Write " <param name= value=""-1"">"& vbCrLf
Response.Write " <param name=""CaptioningID"" value>"& vbCrLf
Response.Write " <param name=""ClickToPlay"" value=""-1"">"& vbCrLf
Response.Write " <param name=""Filename"" value=""" & url & """>"& vbCrLf
Response.Write " <embed src=""" & url & """ height="""& heighta &""" width="""& widtha &""" type=""application/x-oleobject"" codebase=""http://activex.microFlash.com/activex/controls/mplayer/en/nsmp2inf.cab#Version=0,1,1,1"" flename=""mp""></embed>"& vbCrLf
Response.Write "</object>"& vbCrLf
Case 4
Response.Write "<object classid=""clsid:CFCDAA03-8BE4-11cf-B84B-0020AFBBCCFA"" height="""& heighta &""" width="""& widtha &""" id=""video1"" VIEWASTEXT>"& vbCrLf
Response.Write " <param name=""_ExtentX"" value=""5503"">"& vbCrLf
Response.Write " <param name=""_ExtentY"" value=""1588"">"& vbCrLf
Response.Write " <param name=""AUTOSTART"" value=""-1"">"& vbCrLf
Response.Write " <param name=""SHUFFLE"" value=""0"">"& vbCrLf
Response.Write " <param name=""PREFETCH"" value=""0"">"& vbCrLf
Response.Write " <param name=""NOLABELS"" value=""0"">"& vbCrLf
Response.Write " <param name=""SRC"" value=""" & url & """>"& vbCrLf
Response.Write " <param name=""CONTROLS"" value=""Imagewindow,StatusBar,ControlPanel"">"& vbCrLf
Response.Write " <param name=""CONSOLE"" value=""RAPLAYER"">"& vbCrLf
Response.Write " <param name=""LOOP"" value=""0"">"& vbCrLf
Response.Write " <param name=""NUMLOOP"" value=""0"">"& vbCrLf
Response.Write " <param name=""CENTER"" value=""0"">"& vbCrLf
Response.Write " <param name=""MAINTAINASPECT"" value=""0"">"& vbCrLf
Response.Write " <param name=""BACKGROUNDCOLOR"" value=""#000000"">"& vbCrLf
Response.Write "</object>"& vbCrLf
Case 5
Response.Write "<object classid=""clsid:166B1BCA-3F9C-11CF-8075-444553540000"" codebase=""http://download.macromedia.com/pub/shockwave/cabs/director/sw.cab#version=8,5,1,0"" width=""100%"" height=""100%"">"& vbCrLf
Response.Write " <param name=""src"" value=""" & url & """>"& vbCrLf
Response.Write " <param name=""swRemote"" value=""swSaveEnabled='false' swVolume='false' swRestart='false' swPausePlay='false' swFastForward='false' swContextMenu='false' "">"& vbCrLf
Response.Write " <param name=""swStretchStyle"" value=""fill"">"& vbCrLf
Response.Write " <PARAM name=""bgColor"" value=""#000000"">"& vbCrLf
Response.Write " <PARAM name=logo value=""false"">"& vbCrLf
Response.Write " <embed src=""" & url & """ bgColor=""#000000"" logo=""FALSE"" height="""& heighta &""" width="""& widtha &""" swRemote=""swSaveEnabled='false' swVolume='false' swRestart='false' swPausePlay='false' swFastForward='false' swContextMenu='false' "" swStretchStyle=""fill"" type=""application/x-director"" pluginspage=""http://www.macromedia.com/shockwave/download/""></embed>"& vbCrLf
Response.Write "</object>"& vbCrLf
end select
%> </td>
</tr>
<tr>
<td align="center" colspan="2">{$$nd_dings_it($xxvar$id,picsp)} <br />
<br />
</td>
</tr>
<tr bgcolor="#cccccc">
<td valign="middle" align="center" colspan="2" height="1"> </td>
</tr>
<tr>
<td valign="middle" align="center" colspan="2" height="42"><%
'因为next_pre_picsp($.... 也占用rs_x，所以会冲突，所以先备份以下变量
contt=rs_x("content")
downaddr=rs_x("DownAddress")
is_show_down=rs_x("is_show_down")
ddoid=rs_x("id")
%><%ii=rs_x("classid")%>{$$next_pre_picsp($xxvar$id,$xx_var_asp$ii)}  </td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
<tr>
<td>
<table cellspacing="0" cellpadding="0" width="98%" align="center" border="0">
<tbody>
<tr>
<td height="5"> </td>
</tr>
<tr>
<td>
<table class="a11pd" cellspacing="0" cellpadding="0" width="100%" align="center">
<tbody>
<tr>
<td height="89">
<table height="103" cellspacing="0" cellpadding="0" width="100%" border="0">
<tbody>
<tr>
<td bgcolor="#efefef">
<table height="23" cellspacing="1" cellpadding="0" width="100%" bgcolor="#d6e9fc" border="0">
<tbody>
<tr>
<td width="4%"> </td>
<td width="96%"><strong>简介</strong></td>
</tr>
</tbody>
</table>
</td>
</tr>
<tr>
<td style="word-break: break-all" width="100%" height="75"><%
ctntoxkk=contt
ctntoxkk=rp_usef_cont(contt)
call autoxpagexit(0,ctntoxkk)
%></td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
<tr>
<td>
<table cellspacing="0" cellpadding="0" width="98%" align="center" border="0">
<tbody>
<tr>
<td height="5"> </td>
</tr>
<tr>
<td>
<table class="a11pd" cellspacing="0" cellpadding="0" width="100%" align="center">
<tbody>
<tr>
<td height="89">
<table height="89" cellspacing="0" cellpadding="0" width="100%" border="0">
<tbody>
<tr>
<td bgcolor="#eeeeee">
<table height="23" cellspacing="1" cellpadding="0" width="100%" bgcolor="#d6e9fc" border="0">
<tbody>
<tr>
<td width="4%"> </td>
<td width="96%"><strong>下载本内容</strong></td>
</tr>
</tbody>
</table>
</td>
</tr>
<tr>
<td style="word-break: break-all" width="100%" height="61">
<table cellspacing="0" cellpadding="0" width="98%" border="0">
<%if trim(downaddr)="" or cstr(is_show_down)<>"1" then
%>
<tbody>
<tr>
<td colspan="2">此内容暂不提供 下载</td>
</tr>
<%
else
%>
<tr height="22">
<td width="3%"> </td>
<td width="97%"><a target="_blank" href="$xxvar$durl?softid=<%=ddoid%><%="&"%>channel=0"><strong><font color="#0033ff">点击下载本内容</font></strong></a></td>
</tr>
<%
end if
%>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
<tr>
<td>
<table cellspacing="0" cellpadding="0" width="98%" align="center" border="0">
<tbody>
<tr>
<td height="5"> </td>
</tr>
<tr>
<td>
<table class="a11pd" cellspacing="0" cellpadding="0" width="100%" align="center">
<tbody>
<tr>
<td height="89">
<table height="89" cellspacing="0" cellpadding="0" width="100%" border="0">
<tbody>
<tr>
<td bgcolor="#eaeaea">
<table height="23" cellspacing="1" cellpadding="0" width="100%" bgcolor="#d6e9fc" border="0">
<tbody>
<tr>
<td width="4%"> </td>
<td width="96%"><strong>相关</strong></td>
</tr>
</tbody>
</table>
</td>
</tr>
<tr>
<td style="word-break: break-all" width="100%" height="61">{$$xiangguan(picsp,$xxvar$id)}</td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
<tr>
<td>
<table cellspacing="0" cellpadding="0" width="98%" align="center" border="0">
<tbody>
<tr>
<td height="5"> </td>
</tr>
<tr>
<td>
<table class="a11pd" cellspacing="0" cellpadding="0" width="100%" align="center">
<tbody>
<tr>
<td height="89">
<table height="89" cellspacing="0" cellpadding="0" width="100%" border="0">
<tbody>
<tr>
<td bgcolor="#eaeaea">
<table height="23" cellspacing="1" cellpadding="0" width="100%" bgcolor="#d6e9fc" border="0">
<tbody>
<tr>
<td width="4%"> </td>
<td width="96%"><strong>评论（评论内容只代表网友观点，与本站立场无关！）</strong></td>
</tr>
</tbody>
</table>
</td>
</tr>
<tr>
<td style="word-break: break-all" width="100%" height="61">{$$pinlun_c(picsp,$xxvar$id)}<br />
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</td>
</tr>
</tbody>
</table>
</div>